home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / wlib11_2.zip / EXAMPLES.EXE / EXAM71.C < prev    next >
C/C++ Source or Header  |  1991-03-13  |  594b  |  25 lines
  1.   #include "window.h"
  2.   #define NORM   CREATE_VIDEO_ATTRIBUTE(black,white)
  3.  
  4.   WPOINTER w;
  5.   VWPOINTER vw;
  6.   char buf[26];
  7.   char *str = "Hello World!!";
  8.   main()
  9.   {
  10.     int i;
  11.     WindowInitializeSystem();
  12.     WindowSaveInitial(0);
  13.     w = WindowInitialize(BORDER,1,1,20,10,NORM,NORM,SINGLEBOX);
  14.     vw = VirtualInitialize(ATTRIBUTE,30,80,NORM);
  15.     WindowOpen(w);
  16.     WindowDisplay(w,1,NOEFFECT);
  17.  
  18.     for (i=0;i<26;i+=2,str++)
  19.     {
  20.       buf[i] = *str;
  21.       buf[i+1] = NORM;
  22.     }
  23.     VirtualWriteCharAndAttr(vw,buf,1,1,13);
  24.     WindowAssignToVirtual(w,vw,1,1);
  25.   }